home *** CD-ROM | disk | FTP | other *** search
/ Linux Cubed Series 2: Applications / Linux Cubed Series 2 - Applications.iso / editors / emacs / xemacs / xemacs-1.006 / xemacs-1 / lib / xemacs-19.13 / lisp / ilisp / ilisp-mak.el < prev    next >
Encoding:
Text File  |  1995-01-26  |  3.1 KB  |  128 lines
  1. ;;; -*- Mode: Emacs-Lisp -*-
  2.  
  3. ;;; ilisp-mak.el --
  4.  
  5. ;;; This file is part of ILISP.
  6. ;;; Version: 5.7
  7. ;;;
  8. ;;; Copyright (C) 1990, 1991, 1992, 1993 Chris McConnell
  9. ;;;               1993, 1994 Ivan Vasquez
  10. ;;;               1994, 1995 Marco Antoniotti and Rick Busdiecker
  11. ;;;
  12. ;;; Other authors' names for which this Copyright notice also holds
  13. ;;; may appear later in this file.
  14. ;;;
  15. ;;; Send mail to 'ilisp-request@lehman.com' to be included in the
  16. ;;; ILISP mailing list. 'ilisp@lehman.com' is the general ILISP
  17. ;;; mailing list were bugs and improvements are discussed.
  18. ;;;
  19. ;;; ILISP is freely redistributable under the terms found in the file
  20. ;;; COPYING.
  21.  
  22.  
  23.  
  24. ;;;
  25. ;;; This file is used by make to compile ilisp.
  26. ;;;
  27. ;;; Note: 11/23/94 Marco Antoniotti. Actually I believe that this
  28. ;;; should be removed or redone.
  29.  
  30. (message "ILISP Compilation: starting.")
  31.  
  32. ;;(require 'bytecomp)
  33.  
  34. (if (not (file-exists-p "ilcompat.el"))
  35.     (error "ILISP Compilation: compatibility file 'ilcompat.el' non existent.")
  36.   (progn
  37.     (setq load-path (cons "." load-path))
  38.  
  39.     (load "ilcompat.el")        ; Need to load this beforehand
  40.                     ; to use the +ilisp-emacs-version-id+
  41.                     ; constant.
  42.  
  43.     (message ";;; Emacs Version %s" +ilisp-emacs-version-id+)
  44.  
  45.     (if (eq +ilisp-emacs-version-id+ 'fsf-18)
  46.     (load "comint-v18")
  47.       (load "comint"))
  48.  
  49.  
  50.     ;; Try to generate bytecodes for emacs 19.
  51.     ;; I am no expert on the Byte Compiler. ANyone who is please send
  52.     ;; me mail.
  53.     ;; Marco Antoniotti <marcoxa@cs.nyu.edu>
  54.  
  55.     (if (eq +ilisp-emacs-version-id+ 'fsf-18)
  56.     (setq byte-compile-emacs18-compatibility t)
  57.       (setq byte-compile-generate-emacs19-bytecodes t
  58.         byte-compile-warnings '(redefine callargs unresolved)))
  59.  
  60.     ;; Compile compatibility files
  61.     (progn
  62.       (cond ((or (eq +ilisp-emacs-version-id+ 'lucid-19)
  63.          (eq +ilisp-emacs-version-id+ 'lucid-19-new)
  64.          (eq +ilisp-emacs-version-id+ 'xemacs))
  65.          (byte-compile "illuc19.el") ; Note that in current version
  66.                     ; of ILISP illuc19 and
  67.                     ; ilxemacs are linked
  68.          )
  69.         ((eq +ilisp-emacs-version-id+ 'fsf-19)
  70.          (byte-compile "ilfsf19.el"))
  71.         ((eq +ilisp-emacs-version-id+ 'fsf-18)
  72.          (byte-compile "ilfsf18.el"))
  73.         (t (error "ILISP Compilation: unrecogninized Emacs version %s"
  74.               +ilisp-emacs-version-id+)))
  75.       (byte-compile "ilcompat.el"))
  76.  
  77.     ;; Other files in the distribution.
  78.  
  79.     (let ((files '(completer
  80.            comint-ipc
  81.            bridge
  82.            ilisp-def
  83.            ilisp-el
  84.            ilisp-sym
  85.            ilisp-inp
  86.            ilisp-ind
  87.  
  88.            ilisp-prc
  89.            ilisp-val
  90.            ilisp-out
  91.            ilisp-mov
  92.            ilisp-key
  93.            ilisp-prn
  94.            ilisp-low
  95.            ilisp-doc
  96.            ilisp-ext
  97.            ilisp-mod
  98.            ilisp-dia
  99.            ilisp-cmt
  100.            ilisp-rng
  101.            ilisp-hnd
  102.            ilisp-utl
  103.            ilisp-cmp
  104.            ilisp-kil
  105.            ilisp-snd
  106.            ilisp-xfr
  107.            ilisp-hi
  108.            ilisp-aut
  109.  
  110.            ;; Dialects.
  111.            ilisp-cl
  112.            ilisp-cmu
  113.            ilisp-acl
  114.            ilisp-kcl
  115.            ilisp-hlw
  116.            ilisp-luc
  117.            ilisp-sch
  118.            )))
  119.       (while files
  120.     (byte-recompile-file (format "%s.el" (car files)) 0)
  121.     (load (format "%s" (car files)))
  122.     (setq files (cdr files))))
  123.  
  124.     (message "Done")))
  125.  
  126. ;;; end of file -- ilisp-mak.el --
  127.  
  128.